﻿Public Partial Class entry
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim d As Date

        d = CType(Request("VacationDate"), Date) 'grab date


    End Sub

End Class